Top 10k strings from Tribe, The (1984)(Fontana Publishing).tap in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [TAP] /

Back to the directory listing

   3 ;"Treasury";
   3 ;"  ";cash;
   3 ;"   ";rs;
   2 vtn=vtn+a(f)-vo
   2 cash=cash-a
   2 *(ls>ls1)+10
   2 *(ls=ls1)-40
   2 *(ls<ls1)-5
   2 *(ls1>ls2)-25
   2 *(ls1<ls2)-5
   2 *(b(f)>c(f))
   2 *(b(f)=c(f))+20
   2 *(b(f)<c(f))-10
   2 *(a(f)>b(f))+10
   2 *(a(f)=b(f))-5
   2 *(a(f)<b(f))-30
   1 vty=vty+vo:
   1 vty=vty+vo
   1 vt=vt+(ls-ye*4
   1 tp=tp+a(f):
   1 sat=sat+(sat<-1
   1 sat=(ls-ls1)*2
   1 po=po+rs*2
   1 po=po+(tp-20
   1 ls=ls+s(f):
   1 cash=cash-s(3
   1 cash=cash-b
   1 cash=cash-a:
   1 cash=cash+a*sp
   1 c(f)=b(f):
   1 b(f)=a(f):
   1 a>(cash+a)/5
   1 a(f)=a(f)-b:
   1 a(f)=a(f)+a:
   1 TRIBE 4   
   1 ;b;" ";b$(
   1 ;"you cannot pay them, smash";
   1 ;"workers ";
   1 ;"up all existing houses!   ":
   1 ;"to stand."
   1 ;"this ";tp*(s(3
   1 ;"they will force an election."
   1 ;"their wages be increased. "
   1 ;"the Tribe for 25 years!"
   1 ;"the  people's housing would";
   1 ;"people."
   1 ;"money to continue, and you";
   1 ;"ingots to fight an election.":
   1 ;"from workers:";
   1 ;"during which time you";
   1 ;"cost ";b;" ingots."
   1 ;"are thrown out of office!":
   1 ;"and 500 ingots by the grateful";
   1 ;"an election!";
   1 ;"ammased ";rs;" ingots.";
   1 ;"Yout hoard";
   1 ;"Your hoard";
   1 ;"Your hoard ";
   1 ;"Your Hoard";
   1 ;"You were Ruler for ";ye;" years,"
   1 ;"You take your tithe.":
   1 ;"You hire builders.":
   1 ;"You have to spend 50 ingots ";
   1 ;"You have successfully ruled";
   1 ;"You have been sacked.";
   1 ;"You have been re-elected!.":
   1 ;"You do not have enough";
   1 ;"You cannot afford this poll!":
   1 ;"You bribe them.":
   1 ;"You are rewarded with lands";
   1 ;"YEAR ";ye-1
   1 ;"Would you like a poll? (y/n) ":
   1 ;"Workers:";
   1 ;"Weather: ";
   1 ;"Wages currently cost ";s(3
   1 ;"Wages ";("Increased"
   1 ;"Treasury   ";
   1 ;"Total votes for you = ";vty;" "
   1 ;"Total votes against you = ";vtn;" "
   1 ;"Total harvest....";ha;" "
   1 ;"Total food available: ";st;" ";''
   1 ;"Total   ";
   1 ;"The workers demand that   ";
   1 ;"The treasury owes too much";
   1 ;"The people are ";b$
   1 ;"The guild fathers say that";
   1 ;"The builders, finding that";
   1 ;"The ";("guild"
   1 ;"TOTAL POINTS.....";po:
   1 ;"THE TRIBE"''
   1 ;"THE END OF YOUR REIGN"
   1 ;"SITUATION REPORT: Start Year ";ye;
   1 ;"SCORE:";
   1 ;"Retirements "':
   1 ;"Recruits needing work: ";np;" "
   1 ;"Prices:";
   1 ;"Press ";
   1 ;"PRESS 1,2,3 or 0 for no poll"
   1 ;"PEOPLE   FOR YOU  AGAINST YOU"
   1 ;"New building standard: ";s(2
   1 ;"LIVING STANDARDS"
   1 ;"Hiring builders to improve";
   1 ;"GROWTH OF LIVING STANDARDS"
   1 ;"For your hoard..........";rs*2
   1 ;"For time in power.......";50
   1 ;"For population growth...";(tp-20
   1 ;"For living standards....";:
   1 ;"Food stored";
   1 ;"Food received";
   1 ;"Estimated votes for you=";vty
   1 ;"Est. votes against you=";vtn
   1 ;"ELECTORAL POLL"
   1 ;"Do you try to bribe them? (y/n) ":
   1 ;"Do you hire builders? (y/n) ":
   1 ;"Do you 1)Increase, 2)decrease or3)not change  the wages?";
   1 ;"DEVELOPMENTS"
   1 ;"BONUS";:
   1 ;"ALL RECRUITS PLACED";
   1 ;"AFTER THE HARVEST"
   1 ;"A wage increase would make";
   1 ;"3) In-depth poll..";a*3
   1 ;"25 YEARS OF POWER"
   1 ;"2) Large poll.....";a*2
   1 ;"1) Quick poll.....";a;
   1 ;"****NONE****"
   1 ;" to continue"
   1 ;" ingots"
   1 ;" Guild support = ";us;"%"
   1 -wi-di+(ls-ye)/2
   1 -sat)-(sat>3
   1 -(cash<-189
   1 +ls-ls2+s(3
   1 +(b(f)=a(f))*.2
   1 *((b(f)>a(f))+(c(f)>b(f))*.75
   1 );("unchanged"
   1 );("people"
   1 );("decreased"
   1 );" force you to hold";
   1 )-(b>a(f))*(a(f)-b):
   1 (a(f)/tp*100
   1 ("new ";b$;"? ");a:
   1 "rioting","annoyed","restless","satisfied","happy"
   1 "food","housing","wages"
   1 "Warm & dry","Warm & wet","Cold & dry","Cold & wet","Drought"
   1 "Selling price for food  is"',(sp);" ingots/sack"'"How many sacks food sold? ";a
   1 "Hunters","Gatherers","Fishers","Farmers"
   1 "How much? ";a:
   1 "How much of the treasury do you divert to your own funds? ";a:
   1 "How much food for the workers? ";a:
   1 "=IDEAL L.S.";
   1 "=ACTUAL L.S."
   1 "2514030203","4624242314","0236022400","3647130201"
   1 " food prices increase!":
   1 " You have been elected Chief of a small tribe. You must make thetribe prosper and become wealthywithin 25 years.If  you do not  please the people, the will     dispose of you."
   1  S.Robert Speel 1984
   1  ELECTION